ggplotly(shots.quarter, tooltip = c("# Shots", "Type"))
ggplotly(made.quarter, tooltip = c("Shooting %", "Type"))
brfss.plotly